//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit2.h"
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm2 *Form2;
//---------------------------------------------------------------------------
__fastcall TForm2::TForm2(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm2::FormKeyDown(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
    /*
           AnsiString s;
    s.printf("Key Down: %d", Key);
   Form1->Memo1->Lines->Add(s);
   */
}
//---------------------------------------------------------------------------

void __fastcall TForm2::FormKeyPress(TObject *Sender, char &Key)
{
      /*
           AnsiString s;
    s.printf("Key Down: %d", Key);
   Form1->Memo1->Lines->Add(s);
  // if(Key != 0)
  */
}
//---------------------------------------------------------------------------
void __fastcall TForm2::ApplicationEvents1Message(tagMSG &Msg,
      bool &Handled)
{
   /*
        if(Msg.message ==275) return;
        AnsiString s;
        s.printf("%x %x %x %x", Msg.message, Msg.wParam, Msg.lParam, Msg.time);
    //    Msg.
    //  if(Msg.message == 256)       //key down
   // 258 //keyup
          Form1->Memo1->Lines->Add(s);
     */
}
//---------------------------------------------------------------------------
